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Name: Sprite Graphics Support 

This component provides support for sprite 
graphical object which can be 
created and manipulated by a set of services to be described 
below. A sprite can be up to 255 x 255 characters in sizey 
however only 32 x 22 can be displayed. Each sprite is 
identified by a sprite-id, a number greater or equal to 
zero, and has the following properties: 


Description: 
graphics. A sprite is a 


definition - a pointer to a width x height character 
bitmap, where width and height are user defined. Al 
indicates foreground color, a 0 indicates background 
color. 


location on the screen of the 
Sprite. 


position - the row, col 
upper left corner of the 


the screen attribute Cforeground color). A 
black, 1 indicates blue, etc. 


egior - 
value of 0 indicates 


size - the width and height of the sprite Cin 
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be initialized before using any of the sprite services. The 
sprite support services can be invoked from machine code and 
BASIC. There is a BASIC interface routine, which takes as 
its parameter a BASIC string variable. The name of this 
variable is specified by poking in the starting character 
into the location pointed to by SPRITES. ‘For example, if 
POKE 24296, CODEC"C") is executed, the variable C$ will be 
used to pass commands to the interface routine. This must 
be done before using any sprite services. The interface 
routine is invoked by LET <variable> = USR <TBS>. The 
status code returned by the last sprite service executed is 
assigned to <variable>. 


The BASIC interface routine will cause report "A: Invalid 
argument" to be produced whenever an illegal command or 
invalid argument to a command is found. If too few or too 
many arguments are given for some command, the report "Q: 
Parameter error" is produced. Tne machine code routines 
will all return status codes in the 8C register pair. If 
the value in C is 05 then no error occurred. In this case B 
contains a value indicating further status information. If 
an error occurred, C will contain an odd value Cthus bit 0 
is set). 


The BASIC interface string variable contains sprite graphics 
commands, separated by spaces. The commands have the 
following syntax: 


"command letter><parameter list>" 


where <command letter> is a single upper or lower case 


letter identifying the command: 


“" 


Create_Sprite 
Set_Autowrap_Mode 
Put_Sprite 

Erase_Sprite 
Move_Sprite 
Change_Sprite_Location 
Change_Sprite_Attribute 
Overlap? 
Horizontal_Scroll 
Vertical Scroll 
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and where <parameter list> is a list of numbers separated by 
commas. The string assigned to C$ can .be ae string 
expressions ise@e,y "“Ksubdstr>"+VALSCCexpr>)+"Csubstrd>". The 
semantics of these commands will be described in detail 
below. 
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ASC Numbers: XXX 
Ageglication Services 
Name: Create_Sprite 
Machine code interface: 
Inputs: A = sprite-id, 0..255 
B = widths 0.2255 
C = heights 0..255 
D = color, Coe? 
HL = definition address, 0.-54K-1 
Dutputs: BC = 00h —- OK Csprite created) 
= O1h - not enough memory 
BASIC interface: 
Inputs: LET C$ = 
"C<sprite-id>»s<width>,<height>,<color>,<addr>" 
Description: This service creates a sprite with the 
specified widths height, color, and definition address. 
Initially, the position of the sprite is (0,5 0). If there 


was already a sprite with the specified id, it is destroyed. 
In all further operations the new sprite is identified by 
its sprite-id. If there is not enough free memory for the 
new sprite, a 01h is returned, otherwise a 00h is returned. 


BASIC example: "C0,2,2525332768" creates sprite 0 which is 2 
x 2 characters in size, is red in color, and whose 
definition is located at 32768. The initial position of the 
sprite is (0,5 0). 
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Name: Set_Autowrap_Mode 
Machine code interface: 
Inputs: A = mode: 0 - off, not 0 - on 


Outputs: BC = 00h - OK 


BASIC interface: 

Inputs: LET C$ = "S<mode>" 
Description: This service turns the Autowrap mode on and 
oft. When the Autowrap mode is ony all changes to 6 
sprite’s location are made so that the new location is on 


the screen Cwraparound). 


BASIC example: "S1" causes Autowrap mode to be turned on. 
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Names Put Sprite 


Machine code interface: 


Inputs: A = sprite-id, 0..255 
D = row, 0... 255 
E = columns 0..255 
Outputs: BC = 00h =- OKs nothing overwritten 
10h - OK, something overwritten 
03h - illegal sprite-id. 
D = row 
E = column 
BASIC interface: 
Inputs: LET C$ = "Pcsprite-id>»s<row>s<column>" 


Description: This service writes a sprite on the screen. 
The row and column described above define the location at 
which the upper left corner of the sprite is written. If 
the Autowrap mode is set, the row and column values are 
modified to make sure that the sprite location is a legal 


screen location. The new row and column values are 
returned. If the Autowrap mode is not set,» the position is 
not changed. Howevery only those parts of the sprite 


corresponding to legal screen positions will be displayed. 
If writing the sprite causes something on the screen to be 
overwritten, the appropriate code is returned. 


BASIC example: "P0Q,511,0" puts sprite 0 at row 11, column O. 
Anything already at that location is overwritten. aT 
anything is overwritten, the interface routine returns 10h. 
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Name: Erase_Sprite 
Machine code interface: 
Inputs: A = sprite-id, 0..255 
Outputs: BC = 00h - OK Csprite erased) 
03h = illegal sprite-id 
BASIC interface? 
Inputs: LET C$ = “E<sprite-id>"™ 
Description: This service erases a sprite. The screen 


becomes blank where the sprite used to be. The sprite still 
exists and can be written elsewhere. 


BASIC example: "EQ" erases sprite 0. The screen locations 
taken up by the sprite become blank. 
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Name: Move_Sprite 


Machine code interface: 


Inputs: <A = sprite-id,y 0..255 
D = relative horizontal motion, -128..127 
E = relative vertical motions, -128..127 
Qutputs: BC = 00h —- OKy nothing overwritten 
10h - OKs something overwritten 
03h - illegal sprite-id 
0D = row 
E = column 
BASIC interface: 
Inputs: LET C$ = "M<sprite-id>»s<hor>»s<vert>" 
Description: This service moves a sprite. The sprite is 


erased at its current location and written at a new location 
defined by: 


old row + relative vertical motion 
old col + relative horizontal motion 


new row 
new col 


The location of the sprite is updated to reflect the motion. 
4s with the "P" commands if the sprite overwrites anything, 
10h is returned. If Autowrap mode is set, then the location 
is automatically wrapped to fit onto the screen Ciewees (32; 
0) becomes (0,5 0)). The new row and column values are 
returned. If Autowrap mode is not set, only those parts of 
the sprite which correspond to legal screen locations will 
be displayed. 


BASIC example: "M0,52,0" changes the position of the sprite 
from Cit, 0) to (135 0)- This operation is equivalent to 
MEG Us a S90" 6 
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Names; Change_Sprite_Location 


Machine code interface? 
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Dutputs: BC = 00h —- OK Clocation changed) 

O3h - illegal sprite-id 
BASIC interface: 

Inputs: LET C$ = "Lésprite-id>s<new-row>,<newcol>"™ 
Description: This service updates the position property of 
a sprite in the same fashion as for Put_Sprite. The sprite 

ae 
e 


is not updated on the screen until > Move_Sprite, 
Put_Sprite, or Eras xecuted. 


Q 


BASIC example: "L0,13,50" will set the location of sprite 0 
to C1350) 
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Name: g 


Machine code interface: 


Inputs: A 
Dutputs:s 8C 
BASIC interface: 


m 


Inputs: . 


Description: Thi 


The 


sprite-id, Qe. 

colors Oset 
00h = OK Ccol 
03h - illegal 
05h - illegal 
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Pace 
changed) 
prite-id 
olor 
d>s<color>" 
the color property of 
een is not updated until 
Sprite is executed. 
color property of sprite 
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Names: Overlap? 


Machine code interface: 


Inputs: D = sprite-id-1, 0..255 
E = sprite-id-2, 0..255 
Outputs: BC = 00h -— GK, no overlap 
20h - OKs overlap 
03h - illegal sprite-id 
BASIC interface: 
Inputs: LET C$ = "O<sprite-id-1>,<sprite-id-2>" 


Description: This service is used to detect if two sprites 
overlap. 


BASIC example: "00,1" causes the interface routine to 
return T8S if sprites 0 and overlap on the screen. 
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Name: Horizontal_Scroll 


Machine code interface: 


Inputs: A = direction: positive number - right, 
negative number - left 


Outputs: BC = 00h — OK 
BASIC interface: 


Inputs: LET C$ = "H<direction>" 


Description: This service is used to scroll the entire 
screen in the horizontal direction by one column. “The 
direction of scroll is to the left if direction is less than 
0, otherwise the scroll is to ‘the right. The position 
property of all sprites is updated by one column to reflect 
the effect of the scroll. If Autowrap mode is not set, then 
1 is added to the column value. If Autowrap mode is set, 
then 1 is added to the column value, and this new value is 
wrapped to fit on the screen. 


BASIC example: "HI" causes the screen to scrolled to the 
right one column. 
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Names Vertical_Scroll 
Machine code interface: 


Inputs: A = direction: positive’ number - downy 
negative number - up 


Outputs: BC = OOH =— OK 


Inputs: LET C$ = "V<direction>d" 


Description: This service is used to seroll the entire 
screen in the vertical direction by one column. The 
direction. of soroll us-uo aif direction is less than Oy 
otherwise the scroll is down. The position property of all 
sprites is updated by one row to reflect the effect of the 
scroll. If Autowrap mode is not sets then 1 is added to the 
column value. If Autowrap mode is Set, then 1 is added to 
the column valuey and this new value-is wrapped to fit on 
the screen. ! 
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